home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 June / macformat-038.iso / Demos / Notting Hill / SINGING / FIRSTMOV.Dxr / 00005_2.ls < prev    next >
Encoding:
Text File  |  1996-02-08  |  185 b   |  15 lines
  1. on mouseUp
  2.   if p(l()) or p(R()) then
  3.     go("1")
  4.     exit
  5.   end if
  6.   if p(3) then
  7.     go("3")
  8.   end if
  9. end
  10.  
  11. on exitFrame
  12.   c([[l(), LC()], [R(), RC()], [3, OC()]])
  13.   go(the frame)
  14. end
  15.